! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
! 
! Sparse Jacobian Data Structures File
! 
! Generated by KPP-2.2.4_gc symbolic chemistry Kinetics PreProcessor
!       (http://www.cs.vt.edu/~asandu/Software/KPP)
! KPP is distributed under GPL, the general public licence
!       (http://www.gnu.org/copyleft/gpl.html)
! (C) 1995-1997, V. Damian & A. Sandu, CGRER, Univ. Iowa
! (C) 1997-2005, A. Sandu, Michigan Tech, Virginia Tech
!     With important contributions from:
!        M. Damian, Villanova University, USA
!        R. Sander, Max-Planck Institute for Chemistry, Mainz, Germany
! 
! File                 : gckpp_JacobianSP.f90
! Time                 : Fri Dec 18 15:54:38 2020
! Working directory    : /n/home08/kbates/GC/Code.12.3.0_MOZART/KPP/Tropchem
! Equation file        : gckpp.kpp
! Output root filename : gckpp
! 
! ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



MODULE gckpp_JacobianSP

  PUBLIC
  SAVE


! Sparse Jacobian Data


  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_0 = (/ &
       1,  2,  3,  4,  4,  4,  4,  4,  5,  5,  5,  5, & ! index 1 - 12
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5, & ! index 13 - 24
       5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  5,  6, & ! index 25 - 36
       6,  6,  7,  7,  7,  7,  7,  7,  7,  7,  8,  8, & ! index 37 - 48
       8,  8,  8,  8,  8,  8,  9,  9, 10, 10, 10, 10, & ! index 49 - 60
      10, 10, 10, 10, 10, 11, 11, 11, 12, 12, 12, 13, & ! index 61 - 72
      13, 14, 14, 14, 14, 14, 15, 15, 15, 16, 16, 16, & ! index 73 - 84
      17, 17, 17, 18, 18, 18, 18, 18, 18, 18, 18, 18, & ! index 85 - 96
      18, 19, 19, 20, 20, 21, 21, 22, 22, 22, 22, 23, & ! index 97 - 108
      23, 24, 24, 24, 25, 25, 26, 26, 26, 27, 27, 27, & ! index 109 - 120
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 121 - 132
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 133 - 144
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 145 - 156
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 157 - 168
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 169 - 180
      28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, & ! index 181 - 192
      28, 28, 28, 28, 28, 28, 28, 28, 29, 29, 29, 29, & ! index 193 - 204
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 205 - 216
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 217 - 228
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 229 - 240
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 241 - 252
      29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, 29, & ! index 253 - 264
      29, 29, 29, 29, 29, 29, 29, 30, 30, 30, 30, 30, & ! index 265 - 276
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 277 - 288
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 289 - 300
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 301 - 312
      30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, 30, & ! index 313 - 324
      30, 30, 30, 31, 31, 31, 31, 31, 31, 31, 31, 31, & ! index 325 - 336
      31, 32, 32, 32, 32, 32, 32, 32, 32, 32, 32, 33, & ! index 337 - 348
      33, 33, 34, 34, 34, 34, 34, 34, 34, 34, 34, 34 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_1 = (/ &
      34, 34, 34, 34, 35, 35, 35, 36, 36, 36, 37, 37, & ! index 361 - 372
      37, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 373 - 384
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 385 - 396
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 397 - 408
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 409 - 420
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 421 - 432
      38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, 38, & ! index 433 - 444
      38, 38, 38, 38, 38, 38, 39, 39, 39, 39, 39, 39, & ! index 445 - 456
      39, 39, 39, 39, 39, 39, 39, 39, 39, 39, 40, 40, & ! index 457 - 468
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 469 - 480
      40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, 40, & ! index 481 - 492
      40, 40, 40, 40, 40, 40, 40, 41, 41, 41, 41, 41, & ! index 493 - 504
      41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, 41, & ! index 505 - 516
      41, 41, 41, 41, 41, 41, 41, 41, 42, 42, 42, 42, & ! index 517 - 528
      43, 43, 43, 44, 44, 44, 44, 44, 45, 45, 45, 45, & ! index 529 - 540
      46, 46, 46, 47, 47, 47, 47, 47, 47, 47, 48, 48, & ! index 541 - 552
      48, 48, 49, 49, 49, 50, 50, 50, 50, 50, 50, 50, & ! index 553 - 564
      50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, & ! index 565 - 576
      50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, 50, & ! index 577 - 588
      50, 50, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 589 - 600
      51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, & ! index 601 - 612
      51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 51, 52, & ! index 613 - 624
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 625 - 636
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 637 - 648
      52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, 52, & ! index 649 - 660
      52, 52, 52, 52, 52, 52, 52, 52, 53, 53, 53, 54, & ! index 661 - 672
      54, 54, 54, 54, 55, 55, 55, 55, 55, 55, 55, 55, & ! index 673 - 684
      55, 55, 56, 56, 56, 56, 56, 56, 56, 56, 56, 56, & ! index 685 - 696
      56, 56, 56, 56, 57, 57, 57, 57, 57, 57, 57, 57, & ! index 697 - 708
      57, 57, 57, 57, 57, 57, 57, 57, 57, 57, 57, 57 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_2 = (/ &
      57, 57, 57, 57, 57, 58, 58, 58, 58, 59, 59, 59, & ! index 721 - 732
      60, 60, 60, 61, 61, 61, 62, 62, 62, 63, 63, 64, & ! index 733 - 744
      64, 64, 64, 65, 65, 65, 66, 66, 66, 67, 67, 67, & ! index 745 - 756
      68, 68, 68, 68, 69, 69, 70, 70, 70, 71, 71, 71, & ! index 757 - 768
      72, 72, 72, 73, 73, 73, 74, 74, 74, 74, 74, 75, & ! index 769 - 780
      75, 75, 75, 75, 76, 76, 77, 77, 78, 78, 78, 78, & ! index 781 - 792
      78, 78, 78, 78, 79, 79, 79, 79, 79, 79, 80, 80, & ! index 793 - 804
      81, 81, 81, 82, 82, 82, 82, 83, 83, 83, 83, 84, & ! index 805 - 816
      84, 84, 85, 85, 86, 86, 87, 87, 87, 87, 88, 88, & ! index 817 - 828
      89, 89, 89, 89, 90, 90, 91, 91, 92, 92, 92, 93, & ! index 829 - 840
      93, 93, 94, 94, 94, 95, 95, 95, 96, 96, 97, 97, & ! index 841 - 852
      97, 98, 98, 99, 99,100,100,100,101,101,101,102, & ! index 853 - 864
     102,103,103,103,104,104,105,105,105,105,106,106, & ! index 865 - 876
     106,107,107,107,107,108,108,108,109,109,109,109, & ! index 877 - 888
     110,110,110,110,111,111,111,111,111,111,111,111, & ! index 889 - 900
     111,111,112,112,112,112,112,113,113,113,113,113, & ! index 901 - 912
     114,114,114,114,114,115,115,115,115,116,116,116, & ! index 913 - 924
     116,117,117,117,117,118,118,118,118,118,118,119, & ! index 925 - 936
     119,119,120,120,120,120,120,120,121,121,121,122, & ! index 937 - 948
     122,122,123,123,123,124,124,124,125,125,125,125, & ! index 949 - 960
     125,125,125,126,126,126,126,127,127,127,127,128, & ! index 961 - 972
     128,128,128,128,128,128,129,129,129,129,130,130, & ! index 973 - 984
     130,130,131,131,131,131,132,132,132,133,133,133, & ! index 985 - 996
     133,134,134,134,135,135,135,135,136,136,136,136, & ! index 997 - 1008
     136,137,137,137,137,138,138,138,138,138,138,138, & ! index 1009 - 1020
     138,138,139,139,139,140,140,140,140,140,140,141, & ! index 1021 - 1032
     141,141,141,142,142,142,142,142,142,143,143,143, & ! index 1033 - 1044
     143,144,144,144,144,144,144,144,145,145,145,145, & ! index 1045 - 1056
     145,145,145,146,146,146,146,146,146,146,147,147, & ! index 1057 - 1068
     147,147,147,148,148,148,148,148,149,149,149,149 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_3 = (/ &
     149,150,150,150,150,151,151,151,151,152,152,152, & ! index 1081 - 1092
     152,152,152,152,152,152,152,152,153,153,153,153, & ! index 1093 - 1104
     153,153,154,154,154,154,155,155,155,155,155,155, & ! index 1105 - 1116
     156,156,156,156,156,157,157,157,157,157,157,157, & ! index 1117 - 1128
     157,157,158,158,158,158,158,159,159,159,159,159, & ! index 1129 - 1140
     160,160,160,160,160,160,160,160,160,160,160,161, & ! index 1141 - 1152
     161,161,161,161,162,162,162,163,163,163,163,163, & ! index 1153 - 1164
     163,164,164,164,164,165,165,165,165,166,166,166, & ! index 1165 - 1176
     166,167,167,167,167,168,168,168,168,169,169,169, & ! index 1177 - 1188
     169,169,170,170,170,170,170,170,170,170,170,171, & ! index 1189 - 1200
     171,171,171,171,171,171,171,171,171,172,172,172, & ! index 1201 - 1212
     172,172,173,173,173,173,173,174,174,174,174,174, & ! index 1213 - 1224
     174,175,175,175,175,176,176,176,176,176,176,176, & ! index 1225 - 1236
     176,176,177,177,177,177,177,177,178,178,178,178, & ! index 1237 - 1248
     178,178,178,179,179,179,179,179,179,180,180,180, & ! index 1249 - 1260
     180,181,181,181,181,182,182,182,182,183,183,183, & ! index 1261 - 1272
     183,183,184,184,184,184,184,185,185,185,185,185, & ! index 1273 - 1284
     186,186,186,186,186,186,187,187,187,187,188,188, & ! index 1285 - 1296
     188,188,188,188,188,188,188,188,188,188,189,189, & ! index 1297 - 1308
     189,189,189,189,190,190,190,190,190,190,190,190, & ! index 1309 - 1320
     190,190,190,191,191,191,191,191,191,191,192,192, & ! index 1321 - 1332
     192,192,192,192,192,193,193,193,193,193,193,193, & ! index 1333 - 1344
     194,194,194,194,194,194,194,194,194,194,195,195, & ! index 1345 - 1356
     195,195,195,196,196,196,196,196,196,197,197,197, & ! index 1357 - 1368
     197,197,198,198,198,198,198,199,199,199,199,200, & ! index 1369 - 1380
     200,200,200,201,201,201,201,201,201,202,202,202, & ! index 1381 - 1392
     202,202,202,202,203,203,203,203,203,203,203,203, & ! index 1393 - 1404
     204,204,204,204,204,205,205,205,205,205,205,205, & ! index 1405 - 1416
     206,206,206,206,207,207,207,207,207,207,207,208, & ! index 1417 - 1428
     208,208,208,208,208,208,209,209,209,209,209,209 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_4 = (/ &
     209,209,209,210,210,210,210,210,210,210,210,210, & ! index 1441 - 1452
     210,211,211,211,211,211,211,211,211,212,212,212, & ! index 1453 - 1464
     212,212,212,212,213,213,213,213,213,213,213,213, & ! index 1465 - 1476
     213,213,213,213,213,213,213,213,213,213,214,214, & ! index 1477 - 1488
     214,214,214,214,214,215,215,215,215,215,215,215, & ! index 1489 - 1500
     215,215,215,216,216,216,216,216,217,217,217,217, & ! index 1501 - 1512
     217,217,218,218,218,218,218,218,218,218,218,218, & ! index 1513 - 1524
     218,218,218,218,218,218,218,218,218,218,218,218, & ! index 1525 - 1536
     218,218,218,219,219,219,219,219,219,219,219,219, & ! index 1537 - 1548
     219,219,219,219,219,219,219,219,219,219,219,219, & ! index 1549 - 1560
     220,220,220,220,220,220,221,221,221,221,221,221, & ! index 1561 - 1572
     221,221,221,221,221,221,221,221,222,222,222,222, & ! index 1573 - 1584
     222,222,222,222,222,222,222,222,222,222,222,222, & ! index 1585 - 1596
     222,222,223,223,223,223,223,223,223,223,223,223, & ! index 1597 - 1608
     223,223,224,224,224,224,224,224,224,224,224,225, & ! index 1609 - 1620
     225,225,225,225,225,225,225,225,225,225,225,225, & ! index 1621 - 1632
     225,226,226,226,226,226,226,226,226,226,227,227, & ! index 1633 - 1644
     227,227,227,227,227,227,227,227,228,228,228,228, & ! index 1645 - 1656
     228,228,228,229,229,229,229,229,229,229,229,229, & ! index 1657 - 1668
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 1669 - 1680
     229,229,229,229,229,229,229,229,229,229,229,229, & ! index 1681 - 1692
     229,229,230,230,230,230,230,230,230,230,230,230, & ! index 1693 - 1704
     230,230,231,231,231,231,231,231,231,232,232,232, & ! index 1705 - 1716
     232,232,232,232,232,232,232,232,232,232,232,232, & ! index 1717 - 1728
     232,232,232,232,232,232,233,233,233,233,233,233, & ! index 1729 - 1740
     233,234,234,234,234,234,235,235,235,235,235,235, & ! index 1741 - 1752
     235,235,235,235,236,236,236,236,236,236,236,236, & ! index 1753 - 1764
     236,236,236,236,237,237,237,237,237,237,237,237, & ! index 1765 - 1776
     237,237,237,237,237,238,238,238,238,238,238,238, & ! index 1777 - 1788
     238,238,238,239,239,239,239,239,239,239,239,239 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_5 = (/ &
     239,239,240,240,240,240,240,240,240,240,240,240, & ! index 1801 - 1812
     240,240,240,240,240,240,240,240,240,240,240,240, & ! index 1813 - 1824
     240,240,241,241,241,241,241,241,241,241,241,241, & ! index 1825 - 1836
     241,241,241,241,242,242,242,242,242,242,242,242, & ! index 1837 - 1848
     242,242,242,242,242,242,242,242,243,243,243,243, & ! index 1849 - 1860
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 1861 - 1872
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 1873 - 1884
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 1885 - 1896
     243,243,243,243,243,243,243,243,243,243,243,243, & ! index 1897 - 1908
     243,243,243,243,243,243,243,243,243,244,244,244, & ! index 1909 - 1920
     244,244,244,244,244,244,244,244,244,244,245,245, & ! index 1921 - 1932
     245,245,245,245,245,245,245,246,246,246,246,246, & ! index 1933 - 1944
     246,246,246,246,246,246,246,247,247,247,247,247, & ! index 1945 - 1956
     247,247,247,247,247,247,247,248,248,248,248,248, & ! index 1957 - 1968
     248,248,248,248,249,249,249,249,249,249,249,249, & ! index 1969 - 1980
     249,249,249,249,249,250,250,250,250,250,250,250, & ! index 1981 - 1992
     250,250,250,250,250,250,250,250,250,250,250,250, & ! index 1993 - 2004
     250,250,250,250,250,250,250,250,250,250,250,250, & ! index 2005 - 2016
     250,250,250,250,250,250,250,250,251,251,251,251, & ! index 2017 - 2028
     251,251,251,251,251,251,251,251,251,251,252,252, & ! index 2029 - 2040
     252,252,252,252,252,252,252,252,252,252,252,252, & ! index 2041 - 2052
     252,253,253,253,253,253,253,253,253,253,253,253, & ! index 2053 - 2064
     253,254,254,254,254,254,254,254,255,255,255,255, & ! index 2065 - 2076
     255,255,255,255,255,255,255,255,256,256,256,256, & ! index 2077 - 2088
     256,256,256,256,256,256,256,257,257,257,257,257, & ! index 2089 - 2100
     257,257,257,257,257,257,257,257,257,257,257,257, & ! index 2101 - 2112
     257,257,257,257,257,257,257,257,257,257,257,257, & ! index 2113 - 2124
     257,257,257,257,258,258,258,258,258,258,258,258, & ! index 2125 - 2136
     258,258,258,258,258,258,258,258,258,258,258,258, & ! index 2137 - 2148
     258,258,258,258,258,258,258,258,258,258,258,258 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_6 = (/ &
     258,258,258,258,258,258,258,258,258,258,258,258, & ! index 2161 - 2172
     258,258,258,258,258,258,258,258,258,258,259,259, & ! index 2173 - 2184
     259,259,259,259,259,259,259,259,260,260,260,260, & ! index 2185 - 2196
     260,260,260,260,261,261,261,261,261,261,261,261, & ! index 2197 - 2208
     261,261,261,261,261,262,262,262,262,262,262,262, & ! index 2209 - 2220
     262,262,262,262,262,262,262,262,262,262,262,262, & ! index 2221 - 2232
     262,262,262,262,262,262,262,262,263,263,263,263, & ! index 2233 - 2244
     263,263,263,263,263,263,263,263,263,263,263,263, & ! index 2245 - 2256
     263,264,264,264,264,264,264,264,264,264,264,264, & ! index 2257 - 2268
     264,264,264,264,265,265,265,265,265,265,265,265, & ! index 2269 - 2280
     265,265,265,265,265,265,265,265,266,266,266,266, & ! index 2281 - 2292
     266,266,266,266,266,266,266,266,266,267,267,267, & ! index 2293 - 2304
     267,267,267,267,267,267,267,267,267,267,267,268, & ! index 2305 - 2316
     268,268,268,268,268,268,268,268,268,268,268,268, & ! index 2317 - 2328
     268,268,268,268,268,268,268,268,268,269,269,269, & ! index 2329 - 2340
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2341 - 2352
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2353 - 2364
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2365 - 2376
     269,269,269,269,269,269,269,269,269,269,269,269, & ! index 2377 - 2388
     269,269,270,270,270,270,270,270,270,270,270,270, & ! index 2389 - 2400
     270,270,270,270,270,270,270,270,270,270,270,270, & ! index 2401 - 2412
     270,271,271,271,271,271,271,271,271,271,271,271, & ! index 2413 - 2424
     271,271,271,271,271,271,271,271,271,271,271,272, & ! index 2425 - 2436
     272,272,272,272,272,272,272,272,272,272,272,272, & ! index 2437 - 2448
     272,273,273,273,273,273,273,273,273,273,273,273, & ! index 2449 - 2460
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2461 - 2472
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2473 - 2484
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2485 - 2496
     273,273,273,273,273,273,273,273,273,273,273,273, & ! index 2497 - 2508
     273,273,273,273,273,273,274,274,274,274,274,274 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_7 = (/ &
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2521 - 2532
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2533 - 2544
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2545 - 2556
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2557 - 2568
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2569 - 2580
     274,274,274,274,274,274,274,274,274,274,274,274, & ! index 2581 - 2592
     274,274,274,274,274,274,275,275,275,275,275,275, & ! index 2593 - 2604
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2605 - 2616
     275,275,275,275,275,275,275,275,275,275,275,275, & ! index 2617 - 2628
     275,275,276,276,276,276,276,276,276,276,276,276, & ! index 2629 - 2640
     276,276,276,276,276,276,276,276,276,277,277,277, & ! index 2641 - 2652
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 2653 - 2664
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 2665 - 2676
     277,277,277,277,277,277,277,277,277,277,277,277, & ! index 2677 - 2688
     277,278,278,278,278,278,278,278,278,278,278,278, & ! index 2689 - 2700
     278,278,278,278,278,278,278,278,278,278,279,279, & ! index 2701 - 2712
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2713 - 2724
     279,279,279,279,279,279,279,279,279,279,279,279, & ! index 2725 - 2736
     279,280,280,280,280,280,280,280,280,280,280,280, & ! index 2737 - 2748
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2749 - 2760
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2761 - 2772
     280,280,280,280,280,280,280,280,280,280,280,280, & ! index 2773 - 2784
     280,280,280,280,280,280,280,280,280,281,281,281, & ! index 2785 - 2796
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2797 - 2808
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2809 - 2820
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2821 - 2832
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2833 - 2844
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2845 - 2856
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2857 - 2868
     281,281,281,281,281,281,281,281,281,281,281,281 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_8 = (/ &
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2881 - 2892
     281,281,281,281,281,281,281,281,281,281,281,281, & ! index 2893 - 2904
     281,281,281,281,281,281,281,282,282,282,282,282, & ! index 2905 - 2916
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 2917 - 2928
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 2929 - 2940
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 2941 - 2952
     282,282,282,282,282,282,282,282,282,282,282,282, & ! index 2953 - 2964
     282,282,282,283,283,283,283,283,283,283,283,283, & ! index 2965 - 2976
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 2977 - 2988
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 2989 - 3000
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3001 - 3012
     283,283,283,283,283,283,283,283,283,283,283,283, & ! index 3013 - 3024
     283,283,283,283,283,283,283,283,283,284,284,284, & ! index 3025 - 3036
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3037 - 3048
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3049 - 3060
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3061 - 3072
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3073 - 3084
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3085 - 3096
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3097 - 3108
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3109 - 3120
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3121 - 3132
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3133 - 3144
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3145 - 3156
     284,284,284,284,284,284,284,284,284,284,284,284, & ! index 3157 - 3168
     284,284,284,284,284,285,285,285,285,285,285,285, & ! index 3169 - 3180
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3181 - 3192
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3193 - 3204
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3205 - 3216
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3217 - 3228
     285,285,285,285,285,285,285,285,285,285,285,285 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_IROW_9 = (/ &
     285,285,285,285,285,285,285,285,285,285,285,285, & ! index 3241 - 3252
     285,286,286,286,286,286,286,286,286,286,286,286, & ! index 3253 - 3264
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3265 - 3276
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3277 - 3288
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3289 - 3300
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3301 - 3312
     286,286,286,286,286,286,286,286,286,286,286,286, & ! index 3313 - 3324
     286,286,286,286,286,286,286,286,287,287,287,287, & ! index 3325 - 3336
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3337 - 3348
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3349 - 3360
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3361 - 3372
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3373 - 3384
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3385 - 3396
     287,287,287,287,287,287,287,287,287,287,287,287, & ! index 3397 - 3408
     287,287,287,287,287,287,287,287,287,287,288,288, & ! index 3409 - 3420
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3421 - 3432
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3433 - 3444
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3445 - 3456
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3457 - 3468
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3469 - 3480
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3481 - 3492
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3493 - 3504
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3505 - 3516
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3517 - 3528
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3529 - 3540
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3541 - 3552
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3553 - 3564
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3565 - 3576
     288,288,288,288,288,288,288,288,288,288,288,288, & ! index 3577 - 3588
     288,288,288,288,288,289,289,289,289,289,289,289 /)
  INTEGER, PARAMETER, DIMENSION(224) :: LU_IROW_10 = (/ &
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3601 - 3612
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3613 - 3624
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3625 - 3636
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3637 - 3648
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3649 - 3660
     289,289,289,289,289,289,289,289,289,289,289,289, & ! index 3661 - 3672
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3673 - 3684
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3685 - 3696
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3697 - 3708
     290,290,290,290,290,290,290,290,290,290,290,290, & ! index 3709 - 3720
     290,291,291,291,291,291,291,291,291,291,291,291, & ! index 3721 - 3732
     291,291,291,291,291,291,291,291,291,291,291,291, & ! index 3733 - 3744
     291,291,291,291,291,291,291,291,291,291,291,291, & ! index 3745 - 3756
     291,291,291,291,291,291,291,291,291,291,291,291, & ! index 3757 - 3768
     291,291,291,291,291,291,291,291,291,291,291,291, & ! index 3769 - 3780
     291,291,291,291,291,291,291,291,292,292,292,292, & ! index 3781 - 3792
     292,292,292,292,292,292,292,292,292,292,292,292, & ! index 3793 - 3804
     292,292,292,292,292,292,292,292,292,292,292,292, & ! index 3805 - 3816
     292,292,292,292,292,292,292,292 /)
  INTEGER, PARAMETER, DIMENSION(3824) :: LU_IROW = (/&
    LU_IROW_0, LU_IROW_1, LU_IROW_2, LU_IROW_3, LU_IROW_4, &
    LU_IROW_5, LU_IROW_6, LU_IROW_7, LU_IROW_8, LU_IROW_9, &
    LU_IROW_10 /)

  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_0 = (/ &
       1,  2,  3,  4, 80, 91, 97,109,  5,162,172,177, & ! index 1 - 12
     193,203,205,212,216,219,225,233,239,250,254,257, & ! index 13 - 24
     261,266,269,282,283,284,286,287,288,289,291,  6, & ! index 25 - 36
      87,111,  7, 80, 91, 97,109,139,161,201,  8, 80, & ! index 37 - 48
      91, 97,109,139,161,201,  9, 10, 10,217,220,231, & ! index 49 - 60
     281,284,285,287,291, 11,234,288, 12,234,285, 13, & ! index 61 - 72
      14, 14,167,181,182,288, 15,134,288, 16, 83,288, & ! index 73 - 84
      17,227,288, 18,202,207,208,211,214,228,251,279, & ! index 85 - 96
     288, 19,221, 20,221, 21,229, 22,107,113,114, 23, & ! index 97 - 108
      24, 24,205,288, 25,258, 26,121,282, 27,121,288, & ! index 109 - 120
      28, 87, 93, 95,111,116,119,133,136,137,144,145, & ! index 121 - 132
     146,147,153,157,163,165,170,171,174,176,179,186, & ! index 133 - 144
     188,189,190,194,202,203,204,205,207,208,209,210, & ! index 145 - 156
     211,212,214,215,220,223,224,225,226,227,228,230, & ! index 157 - 168
     231,233,235,236,239,241,243,245,246,247,248,249, & ! index 169 - 180
     251,252,253,255,256,259,261,263,265,266,267,268, & ! index 181 - 192
     270,281,283,284,287,288,289,291, 29, 80, 91, 97, & ! index 193 - 204
     121,124,125,134,139,149,152,154,157,161,166,177, & ! index 205 - 216
     183,184,185,188,190,194,195,198,199,200,201,206, & ! index 217 - 228
     209,212,215,216,217,220,221,222,223,227,229,231, & ! index 229 - 240
     234,238,241,242,244,246,248,254,258,259,260,262, & ! index 241 - 252
     264,267,271,272,273,274,275,276,277,278,280,281, & ! index 253 - 264
     282,284,285,287,288,291,292, 30, 98,100,105,122, & ! index 265 - 276
     123,131,132,142,162,165,172,173,175,178,188,190, & ! index 277 - 288
     193,194,197,199,200,205,206,216,225,229,231,232, & ! index 289 - 300
     233,234,237,238,256,257,258,261,264,265,266,269, & ! index 301 - 312
     272,274,276,278,280,282,283,284,285,287,288,289, & ! index 313 - 324
     290,291,292, 31,202,207,208,211,214,228,251,286, & ! index 325 - 336
     288, 32,202,207,208,211,214,228,251,279,288, 33, & ! index 337 - 348
     288,289, 34,199,200,202,206,207,208,211,214,228 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_1 = (/ &
     251,282,284,288, 35, 99,288, 36,102,288, 37,104, & ! index 361 - 372
     288, 38,119,121,134,140,150,159,162,167,168,169, & ! index 373 - 384
     172,173,181,182,191,193,197,205,206,209,212,216, & ! index 385 - 396
     217,220,224,225,226,227,229,230,232,233,234,235, & ! index 397 - 408
     236,238,239,245,246,247,248,249,251,252,253,254, & ! index 409 - 420
     255,256,257,259,260,261,263,264,265,266,267,268, & ! index 421 - 432
     269,270,272,275,276,278,279,281,282,283,284,285, & ! index 433 - 444
     286,287,288,289,291,292, 39, 98,206,212,216,225, & ! index 445 - 456
     227,245,251,257,259,269,282,284,287,288, 40,126, & ! index 457 - 468
     151,155,158,183,196,199,200,203,213,223,224,230, & ! index 469 - 480
     233,235,246,247,248,249,255,256,259,267,270,271, & ! index 481 - 492
     282,283,284,285,287,288,291, 41,207,212,224,230, & ! index 493 - 504
     233,235,236,239,249,253,255,256,263,265,266,267, & ! index 505 - 516
     268,269,270,283,284,287,288,291, 42,102,104,288, & ! index 517 - 528
      43, 99,288, 44, 99,102,104,288, 45,130,144,287, & ! index 529 - 540
      46, 81,288, 47,163,180,186,187,189,287, 48,145, & ! index 541 - 552
     153,284, 49, 82,288, 50, 87,111,134,154,166,184, & ! index 553 - 564
     185,195,198,201,203,204,216,229,239,241,254,256, & ! index 565 - 576
     258,260,262,273,274,277,278,280,281,282,285,287, & ! index 577 - 588
     288,292, 51, 90, 98,129,141,143,145,153,162,163, & ! index 589 - 600
     165,174,180,186,187,188,189,194,204,217,220,225, & ! index 601 - 612
     254,256,257,260,282,283,284,285,287,288,291, 52, & ! index 613 - 624
      90,131,143,153,159,162,165,168,173,174,175,180, & ! index 625 - 636
     186,187,189,190,194,204,211,212,214,225,227,232, & ! index 637 - 648
     233,238,255,256,260,263,264,265,269,276,278,279, & ! index 649 - 660
     281,282,283,284,286,287,288,291, 53, 83,288, 54, & ! index 661 - 672
     203,204,270,284, 55,196,233,249,253,270,284,287, & ! index 673 - 684
     288,291, 56,165,174,206,231,247,248,252,259,261, & ! index 685 - 696
     282,283,284,291, 57,135,148,150,192,207,224,235, & ! index 697 - 708
     249,253,268,270,271,272,276,279,281,282,283,284 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_2 = (/ &
     286,287,288,289,291, 58,103,106,288, 59,101,288, & ! index 721 - 732
      60,100,105, 61,112,288, 62, 82,288, 63,128, 64, & ! index 733 - 744
     129,143,288, 65, 83,288, 66,117,288, 67,176,284, & ! index 745 - 756
      68,187,189,287, 69,131, 70, 83,288, 71, 84,288, & ! index 757 - 768
      72,144,284, 73,130,288, 74,163,186,189,284, 75, & ! index 769 - 780
     141,180,187,288, 76,138, 77,142, 78,100,141,180, & ! index 781 - 792
     186,187,189,287, 79,180,186,187,189,287, 80,125, & ! index 793 - 804
      81, 84,288, 81, 82, 84,288, 82, 83, 84,288, 83, & ! index 805 - 816
      84,288, 85,288, 86,288, 87,179,215,223, 88,288, & ! index 817 - 828
      89,226,245,287, 90,165, 91,242, 92,281,290, 93, & ! index 829 - 840
     212,281, 94,252,281, 95,157,281, 96,288, 97,125, & ! index 841 - 852
     242, 98,288, 99,288, 99,100,288, 99,101,288,102, & ! index 853 - 864
     288,102,103,288,104,288,102,104,105,288,104,106, & ! index 865 - 876
     288,107,182,254,288,108,240,287,109,240,284,288, & ! index 877 - 888
     110,139,161,201, 89,111,216,226,227,238,245,254, & ! index 889 - 900
     271,287,112,130,144,287,288,113,167,181,216,288, & ! index 901 - 912
     114,167,181,216,288,115,283,284,288,116,209,287, & ! index 913 - 924
     288,117,176,284,288,118,205,278,281,285,288,119, & ! index 925 - 936
     281,291,120,139,161,201,242,275,121,282,288,122, & ! index 937 - 948
     288,289,123,288,289,124,275,288, 80, 91, 97,125, & ! index 949 - 960
     242,244,287,126,230,284,288,127,236,284,288,128, & ! index 961 - 972
     163,180,186,187,189,287,129,145,284,288,130,144, & ! index 973 - 984
     284,288,131,187,189,287,132,288,289,133,166,273, & ! index 985 - 996
     288,134,285,288,135,268,284,288,136,139,281,287, & ! index 997 - 1008
     288,137,281,284,288,100,138,141,180,186,187,189, & ! index 1009 - 1020
     287,288,139,240,281,140,156,209,285,287,291,141, & ! index 1021 - 1032
     163,284,288,142,180,186,187,189,287,143,153,284, & ! index 1033 - 1044
     288,102,104,130,144,284,287,288,101,103,129,145, & ! index 1045 - 1056
     284,287,288,124,146,244,275,288,289,291,147,205, & ! index 1057 - 1068
     281,283,288,148,231,252,284,288,149,242,244,275 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_3 = (/ &
     288,150,235,284,288,151,224,284,288,101,103,106, & ! index 1081 - 1092
     117,152,176,281,282,284,287,288,106,143,153,284, & ! index 1093 - 1104
     287,288,154,285,288,289,155,203,204,270,284,288, & ! index 1105 - 1116
     156,209,284,288,291, 95,112,130,144,157,281,284, & ! index 1117 - 1128
     287,288,158,248,259,284,288,159,253,263,284,288, & ! index 1129 - 1140
     160,184,185,198,221,222,241,244,262,273,275,161, & ! index 1141 - 1152
     210,242,284,288,162,266,288, 99,141,163,284,287, & ! index 1153 - 1164
     288,164,288,289,290,165,266,284,287,166,273,281, & ! index 1165 - 1176
     285,167,266,284,288,168,255,284,288,169,284,288, & ! index 1177 - 1188
     289,291,170,184,185,198,221,244,262,288,290,146, & ! index 1189 - 1200
     171,222,241,244,273,275,288,289,291,172,228,265, & ! index 1201 - 1212
     284,288,173,225,284,287,288,162,174,266,284,287, & ! index 1213 - 1224
     288,175,256,284,288,117,152,157,176,281,282,284, & ! index 1225 - 1236
     287,288,177,256,282,283,287,288,175,178,256,283, & ! index 1237 - 1248
     284,287,288,179,215,223,282,285,288,180,186,284, & ! index 1249 - 1260
     288,181,266,284,288,182,266,284,288,183,226,245, & ! index 1261 - 1272
     284,288,184,221,241,262,282,185,221,241,262,282, & ! index 1273 - 1284
     102,180,186,284,287,288,187,189,284,288,138,141, & ! index 1285 - 1296
     163,180,186,187,188,189,281,284,287,288,104,187, & ! index 1297 - 1308
     189,284,287,288,128,163,180,186,187,189,190,281, & ! index 1309 - 1320
     284,287,288,191,233,261,278,284,285,288,192,254, & ! index 1321 - 1332
     268,282,288,289,291,193,245,254,282,284,287,288, & ! index 1333 - 1344
     142,180,186,187,189,194,281,284,287,288,195,285, & ! index 1345 - 1356
     288,289,290,196,217,220,267,284,288,197,261,281, & ! index 1357 - 1368
     282,288,198,244,273,281,290,199,282,285,288,200, & ! index 1369 - 1380
     282,285,288,201,210,240,242,281,285,202,234,279, & ! index 1381 - 1392
     281,282,286,287,177,203,256,282,283,284,287,288, & ! index 1393 - 1404
     204,266,283,284,287,118,205,231,278,281,285,288, & ! index 1405 - 1416
     206,282,285,288,207,272,279,281,282,286,287,208, & ! index 1417 - 1428
     264,279,281,282,286,287,121,156,209,282,284,285 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_4 = (/ &
     287,288,291,108,139,201,210,240,242,281,285,287, & ! index 1441 - 1452
     288,211,264,278,279,281,282,286,287, 93,212,238, & ! index 1453 - 1464
     281,284,287,288,213,224,230,235,236,239,247,248, & ! index 1465 - 1476
     249,253,255,256,259,265,266,270,288,291,214,276, & ! index 1477 - 1488
     279,281,282,286,287,215,246,247,259,283,284,285, & ! index 1489 - 1500
     287,288,291,216,266,282,287,288,217,260,284,287, & ! index 1501 - 1512
     288,291,199,200,202,206,207,208,211,214,218,228, & ! index 1513 - 1524
     234,251,264,272,276,278,279,281,282,284,285,286, & ! index 1525 - 1536
     287,288,289, 98,206,212,216,219,225,227,238,245, & ! index 1537 - 1548
     251,257,259,266,269,281,282,284,285,287,288,289, & ! index 1549 - 1560
     220,260,284,285,287,291,170,184,185,198,221,241, & ! index 1561 - 1572
     244,262,273,281,282,284,288,290,124,133,149,166, & ! index 1573 - 1584
     171,222,241,242,244,262,273,275,281,284,285,288, & ! index 1585 - 1596
     289,291,223,246,247,248,259,282,283,284,285,287, & ! index 1597 - 1608
     288,291,151,224,272,283,284,285,287,288,291,107, & ! index 1609 - 1620
     113,114,167,181,182,216,225,254,266,282,284,287, & ! index 1621 - 1632
     288,183,216,226,245,266,282,284,287,288,216,226, & ! index 1633 - 1644
     227,245,255,266,282,284,287,288,228,234,279,281, & ! index 1645 - 1656
     282,286,287, 90, 98,129,141,143,145,153,162,163, & ! index 1657 - 1668
     165,174,180,186,187,188,189,194,204,217,220,225, & ! index 1669 - 1680
     229,254,256,257,260,266,281,282,283,284,285,287, & ! index 1681 - 1692
     288,291,126,164,230,270,271,283,284,287,288,289, & ! index 1693 - 1704
     290,291,231,260,281,284,285,287,288,151,216,217, & ! index 1705 - 1716
     220,224,231,232,233,245,254,260,266,272,281,282, & ! index 1717 - 1728
     283,284,285,287,288,291,233,278,283,284,285,287, & ! index 1729 - 1740
     291,234,282,285,288,289,150,235,272,283,284,287, & ! index 1741 - 1752
     288,289,290,291,127,164,236,270,271,283,284,287, & ! index 1753 - 1764
     288,289,290,291,127,236,237,259,270,271,283,284, & ! index 1765 - 1776
     287,288,289,290,291,216,226,238,245,265,266,282, & ! index 1777 - 1788
     284,287,288,191,233,239,261,278,283,284,285,287 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_5 = (/ &
     288,291,  1,  2,  3, 88, 91,108,109,110,120,125, & ! index 1801 - 1812
     139,161,201,210,240,242,244,275,281,282,284,285, & ! index 1813 - 1824
     287,288,184,185,221,241,244,262,273,275,281,282, & ! index 1825 - 1836
     284,288,289,290, 91, 97,125,161,201,210,240,242, & ! index 1837 - 1848
     244,275,281,282,284,285,287,288, 87,111,134,154, & ! index 1849 - 1860
     166,179,184,185,195,198,201,203,204,210,215,216, & ! index 1861 - 1872
     221,223,226,227,229,238,239,240,241,242,243,244, & ! index 1873 - 1884
     245,246,247,248,254,255,256,257,258,259,260,261, & ! index 1885 - 1896
     262,265,266,271,273,274,275,277,278,280,281,282, & ! index 1897 - 1908
     283,284,285,287,288,289,290,291,292,198,240,242, & ! index 1909 - 1920
     244,273,275,281,282,284,285,287,288,290,183,226, & ! index 1921 - 1932
     245,254,266,282,284,287,288,199,200,206,246,247, & ! index 1933 - 1944
     282,283,284,285,287,288,291,199,200,206,246,247, & ! index 1945 - 1956
     282,283,284,285,287,288,291,206,248,282,283,284, & ! index 1957 - 1968
     285,287,288,291,183,226,245,249,254,266,271,282, & ! index 1969 - 1980
     283,284,287,288,291,207,212,224,230,233,235,236, & ! index 1981 - 1992
     238,239,245,249,250,253,254,255,256,261,263,265, & ! index 1993 - 2004
     266,267,268,269,270,271,272,278,279,281,282,283, & ! index 2005 - 2016
     284,285,286,287,288,289,290,291,121,234,251,272, & ! index 2017 - 2028
     276,278,279,281,282,285,286,287,288,289, 94,148, & ! index 2029 - 2040
     231,252,260,276,277,280,281,283,284,285,287,288, & ! index 2041 - 2052
     291,199,200,206,253,277,282,283,284,285,287,288, & ! index 2053 - 2064
     291,254,266,267,282,287,288,291,168,234,255,276, & ! index 2065 - 2076
     282,283,284,285,287,288,289,291,175,181,182,256, & ! index 2077 - 2088
     264,266,283,284,287,288,291,116,140,156,162,168, & ! index 2089 - 2100
     175,204,208,209,225,226,227,245,254,255,256,257, & ! index 2101 - 2112
     260,264,266,267,276,279,281,282,283,284,285,286, & ! index 2113 - 2124
     287,288,289,291, 90,131,143,153,159,162,165,168, & ! index 2125 - 2136
     173,174,175,180,186,187,189,190,194,204,211,212, & ! index 2137 - 2148
     214,225,227,232,233,238,245,253,254,255,256,258 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_6 = (/ &
     260,263,264,265,266,267,269,272,276,277,278,279, & ! index 2161 - 2172
     281,282,283,284,285,286,287,288,289,291,199,200, & ! index 2173 - 2184
     259,282,283,284,285,287,288,291,260,267,282,283, & ! index 2185 - 2196
     285,287,288,291,191,197,233,261,278,281,282,283, & ! index 2197 - 2208
     284,285,287,288,291,164,195,221,222,237,241,242, & ! index 2209 - 2220
     244,259,262,270,271,272,273,274,275,281,282,283, & ! index 2221 - 2232
     284,285,287,288,289,290,291,292,159,237,253,259, & ! index 2233 - 2244
     263,270,271,277,282,283,284,285,287,288,289,290, & ! index 2245 - 2256
     291,167,181,182,216,254,264,266,267,282,283,284, & ! index 2257 - 2268
     285,287,288,291,172,228,234,265,278,279,281,282, & ! index 2269 - 2280
     283,284,285,286,287,288,289,291,167,181,182,234, & ! index 2281 - 2292
     266,282,283,284,285,287,288,289,291,196,217,220, & ! index 2293 - 2304
     234,260,267,282,283,284,285,287,288,289,291,135, & ! index 2305 - 2316
     195,206,252,260,267,268,270,271,276,277,280,281, & ! index 2317 - 2328
     282,283,284,285,287,288,289,290,291,150,162,172, & ! index 2329 - 2340
     175,178,179,197,204,205,208,212,215,223,225,226, & ! index 2341 - 2352
     228,231,234,235,238,239,245,246,247,248,254,256, & ! index 2353 - 2364
     259,260,261,263,264,265,266,267,269,270,271,272, & ! index 2365 - 2376
     277,278,279,281,282,283,284,285,286,287,288,289, & ! index 2377 - 2388
     290,291,154,155,158,203,204,248,249,254,256,259, & ! index 2389 - 2400
     264,266,267,270,271,282,283,284,285,287,288,289, & ! index 2401 - 2412
     291,196,217,220,233,249,253,254,260,266,267,270, & ! index 2413 - 2424
     271,277,278,282,283,284,285,287,288,289,291,206, & ! index 2425 - 2436
     234,248,272,276,282,283,284,285,287,288,289,290, & ! index 2437 - 2448
     291,122,123,132,154,164,166,169,192,195,198,218, & ! index 2449 - 2460
     219,221,222,225,227,228,234,237,238,241,242,244, & ! index 2461 - 2472
     245,250,251,253,254,255,256,257,259,260,261,262, & ! index 2473 - 2484
     263,264,265,266,267,268,269,270,271,272,273,274, & ! index 2485 - 2496
     275,276,277,278,279,280,281,282,283,284,285,286, & ! index 2497 - 2508
     287,288,289,290,291,292,119,121,134,140,150,156 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_7 = (/ &
     159,162,167,168,169,172,173,181,182,191,193,197, & ! index 2521 - 2532
     205,206,209,212,216,217,220,224,225,226,227,228, & ! index 2533 - 2544
     229,230,231,232,233,234,235,236,238,239,245,246, & ! index 2545 - 2556
     247,248,249,251,252,253,254,255,256,257,259,260, & ! index 2557 - 2568
     261,263,264,265,266,267,268,269,270,271,272,274, & ! index 2569 - 2580
     275,276,277,278,279,280,281,282,283,284,285,286, & ! index 2581 - 2592
     287,288,289,290,291,292,124,146,149,222,241,242, & ! index 2593 - 2604
     244,262,268,270,271,272,273,274,275,276,277,278, & ! index 2605 - 2616
     279,280,281,282,283,284,285,286,287,288,289,290, & ! index 2617 - 2628
     291,292,167,181,182,202,234,266,267,276,279,281, & ! index 2629 - 2640
     282,283,284,285,286,287,288,289,291,158,168,177, & ! index 2641 - 2652
     178,196,199,200,215,217,220,239,246,247,248,253, & ! index 2653 - 2664
     255,256,259,260,261,264,265,266,267,270,271,276, & ! index 2665 - 2676
     277,278,279,281,282,283,284,285,286,287,288,289, & ! index 2677 - 2688
     291,167,181,182,206,228,234,248,266,267,278,279, & ! index 2689 - 2700
     281,282,283,284,285,286,287,288,289,291,134,202, & ! index 2701 - 2712
     207,208,211,214,228,234,251,264,266,267,272,276, & ! index 2713 - 2724
     278,279,281,282,283,284,285,286,287,288,289,290, & ! index 2725 - 2736
     291,126,151,155,158,183,196,199,200,203,204,213, & ! index 2737 - 2748
     217,220,223,224,226,230,233,235,236,239,245,246, & ! index 2749 - 2760
     247,248,249,253,254,255,256,259,260,261,264,265, & ! index 2761 - 2772
     266,267,270,271,272,276,277,278,279,280,281,282, & ! index 2773 - 2784
     283,284,285,286,287,288,289,290,291, 92, 93, 94, & ! index 2785 - 2796
      95,116,118,119,125,133,136,137,139,144,145,147, & ! index 2797 - 2808
     151,152,153,157,163,165,166,174,176,179,183,186, & ! index 2809 - 2820
     188,189,190,193,194,196,197,198,201,202,203,204, & ! index 2821 - 2832
     205,207,208,209,210,211,212,214,215,216,217,220, & ! index 2833 - 2844
     223,224,225,226,227,228,230,231,232,233,234,235, & ! index 2845 - 2856
     236,238,239,240,241,242,243,244,245,246,247,248, & ! index 2857 - 2868
     249,251,252,253,254,255,256,257,258,259,260,261 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_8 = (/ &
     262,263,264,265,266,267,268,269,270,271,272,273, & ! index 2881 - 2892
     274,275,276,277,278,279,280,281,282,283,284,285, & ! index 2893 - 2904
     286,287,288,289,290,291,292,121,149,152,176,177, & ! index 2905 - 2916
     184,185,197,199,200,206,216,221,223,231,234,240, & ! index 2917 - 2928
     241,242,244,246,247,248,252,254,256,259,260,261, & ! index 2929 - 2940
     262,264,266,267,270,271,272,273,274,275,276,277, & ! index 2941 - 2952
     278,279,280,281,282,283,284,285,286,287,288,289, & ! index 2953 - 2964
     290,291,292,105,115,131,147,159,162,168,173,187, & ! index 2965 - 2976
     189,191,197,205,214,224,225,227,230,231,233,234, & ! index 2977 - 2988
     235,236,237,239,245,246,247,248,249,252,253,254, & ! index 2989 - 3000
     255,256,258,259,260,261,263,264,265,266,267,268, & ! index 3001 - 3012
     269,270,271,272,276,277,278,279,280,281,282,283, & ! index 3013 - 3024
     284,285,286,287,288,289,290,291,292, 96, 98, 99, & ! index 3025 - 3036
     100,101,102,103,104,105,106,119,122,123,126,127, & ! index 3037 - 3048
     128,129,130,131,132,135,137,138,140,141,142,143, & ! index 3049 - 3060
     144,145,148,150,151,153,155,156,157,158,162,163, & ! index 3061 - 3072
     165,167,168,169,172,173,174,175,176,177,178,180, & ! index 3073 - 3084
     181,182,183,186,187,188,189,190,192,193,194,196, & ! index 3085 - 3096
     199,200,203,204,205,206,209,212,213,216,217,218, & ! index 3097 - 3108
     219,220,224,225,226,227,228,229,230,231,233,234, & ! index 3109 - 3120
     235,236,238,239,240,242,244,245,246,247,248,249, & ! index 3121 - 3132
     251,252,253,254,255,256,257,258,259,260,261,263, & ! index 3133 - 3144
     264,265,266,267,268,269,270,271,272,273,274,275, & ! index 3145 - 3156
     276,277,278,279,280,281,282,283,284,285,286,287, & ! index 3157 - 3168
     288,289,290,291,292,119,134,137,147,154,166,179, & ! index 3169 - 3180
     195,197,198,199,200,201,202,205,206,207,208,209, & ! index 3181 - 3192
     210,211,212,214,215,220,223,227,228,229,231,234, & ! index 3193 - 3204
     238,240,241,242,243,244,245,246,247,248,251,254, & ! index 3205 - 3216
     255,256,257,258,259,260,261,262,263,264,265,266, & ! index 3217 - 3228
     267,269,270,271,272,273,274,275,276,277,278,279 /)
  INTEGER, PARAMETER, DIMENSION(360) :: LU_ICOL_9 = (/ &
     280,281,282,283,284,285,286,287,288,289,290,291, & ! index 3241 - 3252
     292, 98,100,105,122,123,131,132,142,162,165,172, & ! index 3253 - 3264
     173,175,178,180,186,187,188,189,190,193,194,197, & ! index 3265 - 3276
     199,200,202,205,206,207,208,211,214,216,225,228, & ! index 3277 - 3288
     229,231,232,233,234,237,238,245,251,254,256,257, & ! index 3289 - 3300
     258,259,260,261,263,264,265,266,267,269,270,271, & ! index 3301 - 3312
     272,274,275,276,277,278,279,280,281,282,283,284, & ! index 3313 - 3324
     285,286,287,288,289,290,291,292,108,125,136,139, & ! index 3325 - 3336
     144,145,153,157,163,165,174,176,186,188,189,190, & ! index 3337 - 3348
     194,202,203,204,207,208,209,211,212,214,217,220, & ! index 3349 - 3360
     224,225,226,228,230,231,233,234,235,236,238,239, & ! index 3361 - 3372
     240,242,244,245,246,247,248,249,251,252,253,254, & ! index 3373 - 3384
     255,256,259,260,261,263,264,265,266,267,268,270, & ! index 3385 - 3396
     271,272,273,274,275,276,277,278,279,280,281,282, & ! index 3397 - 3408
     283,284,285,286,287,288,289,290,291,292, 85, 86, & ! index 3409 - 3420
      88, 90, 96, 98, 99,101,102,103,104,106,107,109, & ! index 3421 - 3432
     112,113,114,115,116,117,121,122,123,124,126,127, & ! index 3433 - 3444
     129,130,132,133,134,135,136,137,139,141,143,144, & ! index 3445 - 3456
     145,148,149,150,151,153,154,155,156,157,158,159, & ! index 3457 - 3468
     161,162,163,164,165,166,167,168,169,170,171,172, & ! index 3469 - 3480
     173,174,175,176,177,178,179,180,181,182,183,184, & ! index 3481 - 3492
     185,186,187,189,190,191,192,193,194,195,196,197, & ! index 3493 - 3504
     198,199,200,203,204,205,206,209,210,212,213,215, & ! index 3505 - 3516
     216,217,218,219,220,221,222,223,224,225,226,227, & ! index 3517 - 3528
     228,229,230,231,232,233,234,235,236,237,238,239, & ! index 3529 - 3540
     240,241,242,243,244,245,246,247,248,249,250,251, & ! index 3541 - 3552
     252,253,254,255,256,257,258,259,260,261,262,263, & ! index 3553 - 3564
     264,265,266,267,268,269,270,271,272,273,274,275, & ! index 3565 - 3576
     276,277,278,279,280,281,282,283,284,285,286,287, & ! index 3577 - 3588
     288,289,290,291,292,  2,120,122,123,124,132,133 /)
  INTEGER, PARAMETER, DIMENSION(224) :: LU_ICOL_10 = (/ &
     139,146,154,160,161,164,166,169,171,184,185,192, & ! index 3601 - 3612
     195,198,201,210,218,219,221,222,225,227,228,234, & ! index 3613 - 3624
     237,238,240,241,242,244,245,250,251,253,254,255, & ! index 3625 - 3636
     256,257,259,260,261,262,263,264,265,266,267,268, & ! index 3637 - 3648
     269,270,271,272,273,274,275,276,277,278,279,280, & ! index 3649 - 3660
     281,282,283,284,285,286,287,288,289,290,291,292, & ! index 3661 - 3672
       3, 85, 86, 92, 96,110,139,160,161,164,170,184, & ! index 3673 - 3684
     185,195,198,201,210,221,222,237,240,241,242,244, & ! index 3685 - 3696
     259,262,270,271,272,273,274,275,276,277,278,279, & ! index 3697 - 3708
     280,281,282,283,284,285,286,287,288,289,290,291, & ! index 3709 - 3720
     292, 88, 96,115,119,132,134,147,169,190,194,205, & ! index 3721 - 3732
     209,214,217,220,224,230,231,232,233,234,235,236, & ! index 3733 - 3744
     237,239,245,246,247,248,249,250,252,253,254,255, & ! index 3745 - 3756
     256,259,260,261,263,264,265,266,267,268,269,270, & ! index 3757 - 3768
     271,272,275,276,277,278,279,280,281,282,283,284, & ! index 3769 - 3780
     285,286,287,288,289,290,291,292,135,148,150,192, & ! index 3781 - 3792
     207,224,231,235,249,252,253,254,260,266,267,268, & ! index 3793 - 3804
     270,271,272,276,277,278,279,280,281,282,283,284, & ! index 3805 - 3816
     285,286,287,288,289,290,291,292 /)
  INTEGER, PARAMETER, DIMENSION(3824) :: LU_ICOL = (/&
    LU_ICOL_0, LU_ICOL_1, LU_ICOL_2, LU_ICOL_3, LU_ICOL_4, &
    LU_ICOL_5, LU_ICOL_6, LU_ICOL_7, LU_ICOL_8, LU_ICOL_9, &
    LU_ICOL_10 /)

  INTEGER, PARAMETER, DIMENSION(293) :: LU_CROW = (/ &
       1,  2,  3,  4,  9, 36, 39, 47, 55, 57, 66, 69, & ! index 1 - 12
      72, 74, 79, 82, 85, 88, 98,100,102,104,108,110, & ! index 13 - 24
     113,115,118,121,201,272,328,338,348,351,365,368, & ! index 25 - 36
     371,374,451,467,500,525,529,532,537,541,544,551, & ! index 37 - 48
     555,558,591,624,669,672,677,687,701,726,730,733, & ! index 49 - 60
     736,739,742,744,748,751,754,757,761,763,766,769, & ! index 61 - 72
     772,775,780,785,787,789,797,803,805,808,812,816, & ! index 73 - 84
     819,821,823,827,829,833,835,837,840,843,846,849, & ! index 85 - 96
     851,854,856,858,861,864,866,869,871,875,878,882, & ! index 97 - 108
     885,889,893,903,908,913,918,922,926,930,936,939, & ! index 109 - 120
     945,948,951,954,957,964,968,972,979,983,987,991, & ! index 121 - 132
     994,998,1001,1005,1010,1014,1023,1026,1032,1036,1042,1046, & ! index 133 - 144
     1053,1060,1067,1072,1077,1082,1086,1090,1101,1107,1111,1117, & ! index 145 - 156
     1122,1131,1136,1141,1152,1157,1160,1166,1170,1174,1178,1182, & ! index 157 - 168
     1186,1191,1200,1210,1215,1220,1226,1230,1239,1245,1252,1258, & ! index 169 - 180
     1262,1266,1270,1275,1280,1285,1291,1295,1307,1313,1324,1331, & ! index 181 - 192
     1338,1345,1355,1360,1366,1371,1376,1380,1384,1390,1397,1405, & ! index 193 - 204
     1410,1417,1421,1428,1435,1444,1454,1462,1469,1487,1494,1504, & ! index 205 - 216
     1509,1515,1540,1561,1567,1581,1599,1611,1620,1634,1643,1653, & ! index 217 - 228
     1660,1695,1707,1714,1735,1742,1747,1757,1769,1782,1792,1803, & ! index 229 - 240
     1827,1841,1857,1918,1931,1940,1952,1964,1973,1986,2025,2039, & ! index 241 - 252
     2054,2066,2073,2085,2096,2129,2183,2193,2201,2214,2241,2258, & ! index 253 - 264
     2273,2289,2302,2316,2338,2391,2414,2436,2450,2515,2599,2631, & ! index 265 - 276
     2650,2690,2711,2738,2794,2912,2968,3034,3174,3254,3333,3419, & ! index 277 - 288
     3594,3673,3722,3789,3825 /)

  INTEGER, PARAMETER, DIMENSION(293) :: LU_DIAG = (/ &
       1,  2,  3,  4,  9, 36, 39, 47, 55, 57, 66, 69, & ! index 1 - 12
      72, 74, 79, 82, 85, 88, 98,100,102,104,108,110, & ! index 13 - 24
     113,115,118,121,201,272,328,338,348,351,365,368, & ! index 25 - 36
     371,374,451,467,500,525,529,532,537,541,544,551, & ! index 37 - 48
     555,558,591,624,669,672,677,687,701,726,730,733, & ! index 49 - 60
     736,739,742,744,748,751,754,757,761,763,766,769, & ! index 61 - 72
     772,775,780,785,787,789,797,803,805,809,813,817, & ! index 73 - 84
     819,821,823,827,829,833,835,837,840,843,846,849, & ! index 85 - 96
     851,854,856,859,862,864,867,869,873,876,878,882, & ! index 97 - 108
     885,889,894,903,908,913,918,922,926,930,936,939, & ! index 109 - 120
     945,948,951,954,960,964,968,972,979,983,987,991, & ! index 121 - 132
     994,998,1001,1005,1010,1015,1023,1026,1032,1036,1042,1049, & ! index 133 - 144
     1056,1061,1067,1072,1077,1082,1086,1094,1103,1107,1111,1117, & ! index 145 - 156
     1126,1131,1136,1141,1152,1157,1162,1166,1170,1174,1178,1182, & ! index 157 - 168
     1186,1191,1201,1210,1215,1221,1226,1233,1239,1246,1252,1258, & ! index 169 - 180
     1262,1266,1270,1275,1280,1287,1291,1301,1309,1319,1324,1331, & ! index 181 - 192
     1338,1350,1355,1360,1366,1371,1376,1380,1384,1390,1398,1405, & ! index 193 - 204
     1411,1417,1421,1428,1437,1447,1454,1463,1469,1487,1494,1504, & ! index 205 - 216
     1509,1523,1544,1561,1571,1586,1599,1612,1627,1636,1645,1653, & ! index 217 - 228
     1681,1697,1707,1720,1735,1742,1748,1759,1771,1784,1794,1817, & ! index 229 - 240
     1830,1848,1883,1921,1933,1943,1956,1965,1976,1997,2027,2042, & ! index 241 - 252
     2057,2066,2075,2088,2112,2160,2185,2193,2204,2223,2245,2263, & ! index 253 - 264
     2276,2293,2307,2322,2373,2404,2425,2439,2495,2580,2613,2638, & ! index 265 - 276
     2677,2699,2726,2782,2900,2957,3024,3165,3246,3326,3413,3589, & ! index 277 - 288
     3669,3719,3787,3824,3825 /)


END MODULE gckpp_JacobianSP

